unit Comm;

interface

type
  TUser = class
  public
    UserId: Integer;
    UserNo: string;
    UserName: string;
    UnitId: Integer;
    UnitName: string;
  end;

var
  User: TUser;

implementation

end.
